home *** CD-ROM | disk | FTP | other *** search
/ TOS Silver 2000 / TOS Silver 2000.iso / programm / MM2_DEV / S / MOS / TERMBASE.D < prev    next >
Encoding:
Modula Definition  |  1989-09-20  |  756 b   |  30 lines
  1. DEFINITION MODULE TermBase;
  2.  
  3. (* Grundmodul für 'Terminal'.
  4.  *
  5.  * Enthält Treibervariablen für die Ein- und Ausgabe von Zeichen über
  6.  * die Funktionen aus 'Terminal'.
  7.  * Ein Grundtreiber ist bereits in dem Codeteil dieses Moduls enthalten
  8.  * und wird standardmäßig verwendet.
  9.  *)
  10.  
  11.  
  12. FROM SYSTEM IMPORT LONGWORD;
  13.  
  14. TYPE  BoolProc = PROCEDURE (): BOOLEAN;
  15.       WriteProc= PROCEDURE (REF ARRAY OF CHAR);
  16.       CardProc = PROCEDURE (): CARDINAL;
  17.       LWProc   = PROCEDURE (): LONGWORD;
  18.  
  19. VAR   DoGetGSX : LWProc;    (* kein Echo! *)
  20.       DoBusy   : BoolProc;
  21.       DoWrite  : WriteProc;
  22.       DoWriteCt: WriteProc;
  23.       DoGetRows: CardProc;
  24.       DoGetCols: CardProc;
  25.  
  26. PROCEDURE InitDisplay;
  27. PROCEDURE InitKeyboard;
  28.  
  29. END TermBase.
  30.